home *** CD-ROM | disk | FTP | other *** search
- object RegForm: TRegForm
- Left = 382
- Top = 95
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderStyle = bsDialog
- Caption = 'Net2Phone Registration Form'
- ClientHeight = 469
- ClientWidth = 590
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- KeyPreview = True
- Position = poScreenCenter
- Scaled = False
- OnKeyPress = FormKeyPress
- OnMouseMove = FormMouseMove
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label14: TLabel
- Left = 14
- Top = 352
- Width = 324
- Height = 13
- Caption = 'The following infromation is needed for security puposes:'
- Color = clBtnFace
- ParentColor = False
- end
- object Label1: TLabel
- Left = 274
- Top = 376
- Width = 184
- Height = 26
- Alignment = taCenter
- Caption = 'Mother'#39's Maiden Name or Other Code word'
- Color = clBtnFace
- ParentColor = False
- WordWrap = True
- end
- object Label2: TLabel
- Left = 60
- Top = 54
- Width = 61
- Height = 13
- Alignment = taRightJustify
- Caption = 'First Name'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label4: TLabel
- Left = 68
- Top = 115
- Width = 53
- Height = 13
- Alignment = taRightJustify
- Caption = 'Address1'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label5: TLabel
- Left = 68
- Top = 144
- Width = 53
- Height = 13
- Alignment = taRightJustify
- Caption = 'Address2'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label6: TLabel
- Left = 99
- Top = 176
- Width = 22
- Height = 13
- Alignment = taRightJustify
- Caption = 'City'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label7: TLabel
- Left = 334
- Top = 178
- Width = 67
- Height = 13
- Alignment = taRightJustify
- Caption = 'State/Prov.'
- Color = clBtnFace
- ParentColor = False
- end
- object Label8: TLabel
- Left = 255
- Top = 205
- Width = 44
- Height = 13
- Alignment = taRightJustify
- Caption = 'Country'
- Color = clBtnFace
- ParentColor = False
- end
- object Label9: TLabel
- Left = 26
- Top = 204
- Width = 95
- Height = 13
- Alignment = taRightJustify
- Caption = 'ZIP/Postal Code'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label10: TLabel
- Left = 83
- Top = 240
- Width = 37
- Height = 13
- Alignment = taRightJustify
- Caption = 'Phone'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label11: TLabel
- Left = 37
- Top = 271
- Width = 84
- Height = 13
- Alignment = taRightJustify
- Caption = 'e-Mail Address'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label12: TLabel
- Left = 499
- Top = 92
- Width = 64
- Height = 13
- Alignment = taRightJustify
- Caption = 'Credit Card'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGray
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Visible = False
- end
- object Label13: TLabel
- Left = 524
- Top = 132
- Width = 57
- Height = 13
- Alignment = taRightJustify
- Caption = 'Exp. Date'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGray
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Visible = False
- end
- object Label17: TLabel
- Left = 6
- Top = 377
- Width = 127
- Height = 26
- Alignment = taCenter
- Caption = '5-digit personal identification number. '
- Color = clBtnFace
- ParentColor = False
- WordWrap = True
- end
- object Label18: TLabel
- Left = 12
- Top = 16
- Width = 345
- Height = 13
- Caption = 'Fill out ALL the information and click on the Register Button.'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label19: TLabel
- Left = 336
- Top = 53
- Width = 61
- Height = 13
- Alignment = taRightJustify
- Caption = 'Last Name'
- Color = clBtnFace
- ParentColor = False
- end
- object Label3: TLabel
- Left = 69
- Top = 83
- Width = 52
- Height = 13
- Alignment = taRightJustify
- Caption = 'Company'
- Color = clBtnFace
- ParentColor = False
- Transparent = True
- end
- object Label16: TLabel
- Left = 356
- Top = 205
- Width = 86
- Height = 13
- Caption = '(2 Letter Code)'
- Color = clBtnFace
- ParentColor = False
- end
- object XX: TLabel
- Left = 504
- Top = 272
- Width = 17
- Height = 13
- Caption = 'XX'
- Visible = False
- end
- object Label15: TLabel
- Left = 48
- Top = 310
- Width = 353
- Height = 13
- Caption = 'Check here if you do not want to receive Net2Phone mailings'
- end
- object RegReq: TButton
- Left = 52
- Top = 429
- Width = 110
- Height = 27
- Caption = '&Register'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 16
- OnClick = RegReqClick
- OnEnter = OtherEnter
- end
- object Cancel: TButton
- Left = 422
- Top = 429
- Width = 110
- Height = 26
- Cancel = True
- Caption = '&Cancel'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 18
- OnClick = CancelClick
- OnMouseMove = CancelMouseMove
- end
- object eMail: TEdit
- Left = 125
- Top = 270
- Width = 287
- Height = 21
- Color = clWhite
- MaxLength = 48
- TabOrder = 10
- OnEnter = OtherEnter
- end
- object FirstName: TEdit
- Left = 125
- Top = 50
- Width = 100
- Height = 21
- Color = clWhite
- MaxLength = 10
- TabOrder = 0
- end
- object LastName: TEdit
- Left = 405
- Top = 50
- Width = 157
- Height = 21
- Color = clWhite
- MaxLength = 20
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- OnEnter = OtherEnter
- end
- object Company: TEdit
- Left = 125
- Top = 81
- Width = 178
- Height = 21
- Color = clWhite
- MaxLength = 20
- TabOrder = 2
- OnEnter = OtherEnter
- end
- object Address1: TEdit
- Left = 125
- Top = 113
- Width = 287
- Height = 21
- Color = clWhite
- MaxLength = 32
- TabOrder = 3
- OnEnter = OtherEnter
- end
- object Address2: TEdit
- Left = 126
- Top = 144
- Width = 287
- Height = 21
- Color = clWhite
- MaxLength = 32
- TabOrder = 4
- OnEnter = OtherEnter
- end
- object City: TEdit
- Left = 125
- Top = 174
- Width = 166
- Height = 21
- Color = clWhite
- MaxLength = 20
- TabOrder = 5
- OnEnter = OtherEnter
- end
- object State: TEdit
- Left = 405
- Top = 174
- Width = 157
- Height = 21
- Color = clWhite
- MaxLength = 20
- TabOrder = 6
- OnEnter = OtherEnter
- end
- object Country: TEdit
- Left = 305
- Top = 204
- Width = 42
- Height = 21
- Color = clWhite
- MaxLength = 2
- TabOrder = 8
- OnChange = CountryChange
- OnClick = CountryClick
- OnEnter = CountryEnter
- OnExit = CountryExit
- OnKeyPress = CountryKeyPress
- end
- object PostalCode: TEdit
- Left = 127
- Top = 205
- Width = 100
- Height = 21
- Color = clWhite
- MaxLength = 12
- TabOrder = 7
- OnEnter = OtherEnter
- end
- object Phone: TEdit
- Left = 125
- Top = 238
- Width = 178
- Height = 21
- Color = clWhite
- MaxLength = 25
- TabOrder = 9
- OnEnter = OtherEnter
- end
- object CreditCard: TEdit
- Left = 427
- Top = 111
- Width = 149
- Height = 19
- Color = clBtnFace
- Ctl3D = False
- Enabled = False
- ParentCtl3D = False
- TabOrder = 12
- Visible = False
- end
- object ExpDate: TEdit
- Left = 500
- Top = 143
- Width = 50
- Height = 19
- Color = clBtnFace
- Ctl3D = False
- Enabled = False
- ParentCtl3D = False
- TabOrder = 13
- Visible = False
- end
- object MothersMaidenName: TEdit
- Left = 464
- Top = 383
- Width = 109
- Height = 21
- Color = clWhite
- MaxLength = 16
- TabOrder = 15
- OnEnter = OtherEnter
- end
- object Clear: TButton
- Left = 233
- Top = 429
- Width = 110
- Height = 27
- Caption = 'Cl&ear All'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 17
- OnClick = ClearClick
- OnEnter = OtherEnter
- end
- object PIN: TEdit
- Left = 194
- Top = 382
- Width = 72
- Height = 21
- Color = clWhite
- MaxLength = 5
- PasswordChar = '*'
- TabOrder = 14
- OnEnter = OtherEnter
- end
- object Panel1: TPanel
- Left = 8
- Top = 336
- Width = 577
- Height = 1
- BevelOuter = bvNone
- Color = clBlack
- TabOrder = 20
- end
- object L: TTabListBox
- Left = 305
- Top = 223
- Width = 277
- Height = 17
- TabStop = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- IntegralHeight = True
- ItemHeight = 13
- Items.Strings = (
- 'AD'#9'Andorra'
- 'AE'#9'United Arab Emirates'
- 'AF'#9'Afghanistan'
- 'AG'#9'Antigua and Barbuda'
- 'AI'#9'Anguilla'
- 'AL'#9'Albania'
- 'AM'#9'Armenia'
- 'AN'#9'Netherlands Antilles'
- 'AO'#9'Angola'
- 'AQ'#9'Antarctica'
- 'AR'#9'Argentina'
- 'AS'#9'American Samoa'
- 'AT'#9'Austria'
- 'AU'#9'Australia'
- 'AW'#9'Aruba'
- 'AZ'#9'Azerbaijan'
- 'BA'#9'Bosnia and Herzegovina'
- 'BB'#9'Barbados'
- 'BD'#9'Bangladesh'
- 'BE'#9'Belgium'
- 'BF'#9'Burkina Faso'
- 'BG'#9'Bulgaria'
- 'BH'#9'Bahrain'
- 'BI'#9'Burundi'
- 'BJ'#9'Benin'
- 'BM'#9'Bermuda'
- 'BN'#9'Brunei Darussalam'
- 'BO'#9'Bolivia'
- 'BR'#9'Brazil'
- 'BS'#9'Bahamas'
- 'BT'#9'Bhutan'
- 'BV'#9'Bouvet Island'
- 'BW'#9'Botswana'
- 'BY'#9'Belarus'
- 'BZ'#9'Belize'
- 'CA'#9'Canada'
- 'CC'#9'Cocos (Keeling) Islands'
- 'CF'#9'Central African Republic'
- 'CG'#9'Congo'
- 'CH'#9'Switzerland'
- 'CI'#9'Cote D'#39'Ivoire (Ivory Coast)'
- 'CK'#9'Cook Islands'
- 'CL'#9'Chile'
- 'CM'#9'Cameroon'
- 'CN'#9'China'
- 'CO'#9'Colombia'
- 'CR'#9'Costa Rica'
- 'CS'#9'Czechoslovakia (former)'
- 'CU'#9'Cuba'
- 'CV'#9'Cape Verde'
- 'CX'#9'Christmas Island'
- 'CY'#9'Cyprus'
- 'CZ'#9'Czech Republic'
- 'DE'#9'Germany'
- 'DJ'#9'Djibouti'
- 'DK'#9'Denmark'
- 'DM'#9'Dominica'
- 'DO'#9'Dominican Republic'
- 'DZ'#9'Algeria'
- 'EC'#9'Ecuador'
- 'EE'#9'Estonia'
- 'EG'#9'Egypt'
- 'EH'#9'Western Sahara'
- 'ER'#9'Eritrea'
- 'ES'#9'Spain'
- 'ET'#9'Ethiopia'
- 'FI'#9'Finland'
- 'FJ'#9'Fiji'
- 'FK'#9'Falkland Islands (Malvinas)'
- 'FM'#9'Micronesia'
- 'FO'#9'Faroe Islands'
- 'FR'#9'France'
- 'FX'#9'France, Metropolitan'
- 'GA'#9'Gabon'
- 'GB'#9'Great Britain (UK)'
- 'GD'#9'Grenada'
- 'GE'#9'Georgia'
- 'GF'#9'French Guiana'
- 'GH'#9'Ghana'
- 'GI'#9'Gibraltar'
- 'GL'#9'Greenland'
- 'GM'#9'Gambia'
- 'GN'#9'Guinea'
- 'GP'#9'Guadeloupe'
- 'GQ'#9'Equatorial Guinea'
- 'GR'#9'Greece'
- 'GS'#9'S. Georgia and S. Sandwich Isls.'
- 'GT'#9'Guatemala'
- 'GU'#9'Guam'
- 'GW'#9'Guinea-Bissau'
- 'GY'#9'Guyana'
- 'HK'#9'Hong Kong'
- 'HM'#9'Heard and McDonald Islands'
- 'HN'#9'Honduras'
- 'HR'#9'Croatia (Hrvatska)'
- 'HT'#9'Haiti'
- 'HU'#9'Hungary'
- 'ID'#9'Indonesia'
- 'IE'#9'Ireland'
- 'IL'#9'Israel'
- 'IN'#9'India'
- 'IO'#9'British Indian Ocean Territory'
- 'IQ'#9'Iraq'
- 'IR'#9'Iran'
- 'IS'#9'Iceland'
- 'IT'#9'Italy'
- 'JM'#9'Jamaica'
- 'JO'#9'Jordan'
- 'JP'#9'Japan'
- 'KE'#9'Kenya'
- 'KG'#9'Kyrgyzstan'
- 'KH'#9'Cambodia'
- 'KI'#9'Kiribati'
- 'KM'#9'Comoros'
- 'KN'#9'Saint Kitts and Nevis'
- 'KP'#9'Korea (North)'
- 'KR'#9'Korea (South)'
- 'KW'#9'Kuwait'
- 'KY'#9'Cayman Islands'
- 'KZ'#9'Kazakhstan'
- 'LA'#9'Laos'
- 'LB'#9'Lebanon'
- 'LC'#9'Saint Lucia'
- 'LI'#9'Liechtenstein'
- 'LK'#9'Sri Lanka'
- 'LR'#9'Liberia'
- 'LS'#9'Lesotho'
- 'LT'#9'Lithuania'
- 'LU'#9'Luxembourg'
- 'LV'#9'Latvia'
- 'LY'#9'Libya'
- 'MA'#9'Morocco'
- 'MC'#9'Monaco'
- 'MD'#9'Moldova'
- 'MG'#9'Madagascar'
- 'MH'#9'Marshall Islands'
- 'MK'#9'Macedonia'
- 'ML'#9'Mali'
- 'MM'#9'Myanmar'
- 'MN'#9'Mongolia'
- 'MO'#9'Macau'
- 'MP'#9'Northern Mariana Islands'
- 'MQ'#9'Martinique'
- 'MR'#9'Mauritania'
- 'MS'#9'Montserrat'
- 'MT'#9'Malta'
- 'MU'#9'Mauritius'
- 'MV'#9'Maldives'
- 'MW'#9'Malawi'
- 'MX'#9'Mexico'
- 'MY'#9'Malaysia'
- 'MZ'#9'Mozambique'
- 'NA'#9'Namibia'
- 'NC'#9'New Caledonia'
- 'NE'#9'Niger'
- 'NF'#9'Norfolk Island'
- 'NG'#9'Nigeria'
- 'NI'#9'Nicaragua'
- 'NL'#9'Netherlands'
- 'NO'#9'Norway'
- 'NP'#9'Nepal'
- 'NR'#9'Nauru'
- 'NT'#9'Neutral Zone'
- 'NU'#9'Niue'
- 'NZ'#9'New Zealand (Aotearoa)'
- 'OM'#9'Oman'
- 'PA'#9'Panama'
- 'PE'#9'Peru'
- 'PF'#9'French Polynesia'
- 'PG'#9'Papua New Guinea'
- 'PH'#9'Philippines'
- 'PK'#9'Pakistan'
- 'PL'#9'Poland'
- 'PM'#9'St. Pierre and Miquelon'
- 'PN'#9'Pitcairn'
- 'PR'#9'Puerto Rico'
- 'PT'#9'Portugal'
- 'PW'#9'Palau'
- 'PY'#9'Paraguay'
- 'QA'#9'Qatar'
- 'RE'#9'Reunion'
- 'RO'#9'Romania'
- 'RU'#9'Russian Federation'
- 'RW'#9'Rwanda'
- 'SA'#9'Saudi Arabia'
- 'SB'#9'Solomon Islands'
- 'SC'#9'Seychelles'
- 'SD'#9'Sudan'
- 'SE'#9'Sweden'
- 'SG'#9'Singapore'
- 'SH'#9'St. Helena'
- 'SI'#9'Slovenia'
- 'SJ'#9'Svalbard and Jan Mayen Islands'
- 'SK'#9'Slovak Republic'
- 'SL'#9'Sierra Leone'
- 'SM'#9'San Marino'
- 'SN'#9'Senegal'
- 'SO'#9'Somalia'
- 'SR'#9'Suriname'
- 'ST'#9'Sao Tome and Principe'
- 'SU'#9'USSR (former)'
- 'SV'#9'El Salvador'
- 'SY'#9'Syria'
- 'SZ'#9'Swaziland'
- 'TC'#9'Turks and Caicos Islands'
- 'TD'#9'Chad'
- 'TF'#9'French Southern Territories'
- 'TG'#9'Togo'
- 'TH'#9'Thailand'
- 'TJ'#9'Tajikistan'
- 'TK'#9'Tokelau'
- 'TM'#9'Turkmenistan'
- 'TN'#9'Tunisia'
- 'TO'#9'Tonga'
- 'TP'#9'East Timor'
- 'TR'#9'Turkey'
- 'TT'#9'Trinidad and Tobago'
- 'TV'#9'Tuvalu'
- 'TW'#9'Taiwan'
- 'TZ'#9'Tanzania'
- 'UA'#9'Ukraine'
- 'UG'#9'Uganda'
- 'UK'#9'United Kingdom'
- 'UM'#9'US Minor Outlying Islands'
- 'US'#9'United States'
- 'UY'#9'Uruguay'
- 'UZ'#9'Uzbekistan'
- 'VA'#9'Vatican City State (Holy See)'
- 'VC'#9'Saint Vincent and the Grenadines'
- 'VE'#9'Venezuela'
- 'VG'#9'Virgin Islands (British)'
- 'VI'#9'Virgin Islands (U.S.)'
- 'VN'#9'Viet Nam'
- 'VU'#9'Vanuatu'
- 'WF'#9'Wallis and Futuna Islands'
- 'WS'#9'Samoa'
- 'YE'#9'Yemen'
- 'YT'#9'Mayotte'
- 'YU'#9'Yugoslavia'
- 'ZA'#9'South Africa'
- 'ZM'#9'Zambia'
- 'ZR'#9'Zaire'
- 'ZW'#9'Zimbabwe')
- ParentFont = False
- TabOrder = 19
- Visible = False
- OnClick = LClick
- OnMouseMove = LMouseMove
- TabPercentages = '0'
- end
- object CheckBox1: TCheckBox
- Left = 24
- Top = 302
- Width = 17
- Height = 29
- TabOrder = 11
- end
- object TimerCtl: TTimer
- Enabled = False
- OnTimer = TimerCtlTimer
- Left = 420
- Top = 8
- end
- end
-